home *** CD-ROM | disk | FTP | other *** search
/ Apple WWDC 1996 / WWDC96_1996 (CD).toast / Technology Materials / MacOS 8 Resources / Developer Tools / Mac OS 8 Interfaces & Libraries / Interfaces / AIncludes / IntlResources.a < prev    next >
Text File  |  1996-05-01  |  19KB  |  411 lines

  1. ;
  2. ;    File:        IntlResources.a
  3. ;
  4. ;    Contains:    International Resource definitions.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Release:    Universal Interfaces 3.0d3 on Copland DR1
  8. ;
  9. ;    Copyright:    © 1984-1996 by Apple Computer, Inc.  All rights reserved.
  10. ;
  11. ;    Bugs?:        If you find a problem with this file, send the file and version
  12. ;                information (from above) and the problem description to:
  13. ;
  14. ;                    Internet:    apple.bugs@applelink.apple.com
  15. ;                    AppleLink:    APPLE.BUGS
  16. ;
  17. ;
  18.     IF &TYPE('__INTLRESOURCES__') = 'UNDEFINED' THEN
  19. __INTLRESOURCES__ SET 1
  20.  
  21.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  22.     include 'Types.a'
  23.     ENDIF
  24.  
  25.                                                             ; Bits in the itlcFlags byte 
  26. itlcShowIcon                    EQU        7                    ;Show icon even if only one script
  27. itlcDualCaret                    EQU        6                    ;Use dual caret for mixed direction text
  28.                                                             ; Bits in the itlcSysFlags word 
  29. itlcSysDirection                EQU        15                    ;System direction - left to right/right to left
  30. tokLeftQuote                    EQU        1                    ; NumberParts.data[] enumerators                                             
  31. tokRightQuote                    EQU        2                    ;  In general, these are NOT to be considered indices into the data[] array 
  32. tokLeadPlacer                    EQU        3
  33. tokLeader                        EQU        4
  34. tokNonLeader                    EQU        5
  35. tokZeroLead                        EQU        6
  36. tokPercent                        EQU        7
  37. tokPlusSign                        EQU        8
  38. tokMinusSign                    EQU        9
  39. tokThousands                    EQU        10
  40. tokReserved                        EQU        11                    ; 11 is reserved field 
  41. tokSeparator                    EQU        12
  42. tokEscape                        EQU        13
  43. tokDecPoint                        EQU        14
  44. tokEPlus                        EQU        15
  45. tokEMinus                        EQU        16
  46. tokMaxSymbols                    EQU        31
  47. curNumberPartsVersion            EQU        1                    ;current version of NumberParts record
  48.  
  49. currSymLead                        EQU        16
  50. currNegSym                        EQU        32
  51. currTrailingZ                    EQU        64
  52. currLeadingZ                    EQU        128
  53.  
  54. mdy                                EQU        0
  55. dmy                                EQU        1
  56. ymd                                EQU        2
  57. myd                                EQU        3
  58. dym                                EQU        4
  59. ydm                                EQU        5
  60. ; typedef SInt8                         DateOrders
  61.  
  62.  
  63. timeCycle24                        EQU        0                    ;time sequence 0:00 - 23:59
  64. timeCycleZero                    EQU        1                    ;time sequence 0:00-11:59, 0:00 - 11:59
  65. timeCycle12                        EQU        255                    ;time sequence 12:00 - 11:59, 12:00 - 11:59
  66. zeroCycle                        EQU        1                    ;old name for timeCycleZero
  67. longDay                            EQU        0                    ;day of the month
  68. longWeek                        EQU        1                    ;day of the week
  69. longMonth                        EQU        2                    ;month of the year
  70. longYear                        EQU        3                    ;year
  71. supDay                            EQU        1                    ;suppress day of month
  72. supWeek                            EQU        2                    ;suppress day of week
  73. supMonth                        EQU        4                    ;suppress month
  74. supYear                            EQU        8                    ;suppress year
  75. dayLdingZ                        EQU        32
  76. mntLdingZ                        EQU        64
  77. century                            EQU        128
  78. secLeadingZ                        EQU        32
  79. minLeadingZ                        EQU        64
  80. hrLeadingZ                        EQU        128
  81.     IF FOR_SYSTEM7_AND_SYSTEM8_DEPRECATED THEN
  82. ; Assembly-only constants and records for use with itl2 resources
  83. ;  itl2 header offsets to string comparison hooks 
  84.  
  85. initHook                        EQU        0
  86. fetchHook                        EQU        2
  87. vernierHook                        EQU        4
  88. projectHook                        EQU        6
  89. rsvdHook                        EQU        8
  90. exitHook                        EQU        10
  91. ;
  92. ;Note that the value of itl2FlagsOffset is equal to the value of rsvdHook.
  93. ;In the pre-6.0.4 itl2 format the value at this location was an unused 
  94. ;routine offset. In the itl2 format used with 6.0.4 and later, the value
  95. ;at this location is a flag ($ffff) indicating the new format (i.e., the
  96. ;format that includes the offsets to the tables for LwrString and tables
  97. ;for the simple-script versions of the CharType, Transliterate and FindWord.
  98. ;
  99. ;  itl2 header offsets for system 6.0.4 and later 
  100.  
  101. itl2FlagsOffset                    EQU        8
  102. typeListOffset                    EQU        12
  103. classArrayOffset                EQU        14
  104. upperListOffset                    EQU        16
  105. lowerListOffset                    EQU        18
  106. upperNoMarkListOffset            EQU        20
  107. wordTableOffset                    EQU        22
  108. wrapTableOffset                    EQU        24
  109. noMarkListOffset                EQU        26
  110. itl2VersionOffset                EQU        28
  111. itl2FormatOffset                EQU        30
  112. ;  itl2 header offsets for system 7.0 and later 
  113.  
  114. wordTableLen                    EQU        54
  115. wrapTableLen                    EQU        56
  116. findScriptTableOffset            EQU        60
  117. findScriptTableLen                EQU        62
  118. ;  itl2FormatOffset definitions for system 7.0 and later 
  119.  
  120. hdrExtensionsExist                EQU        1
  121.     ENDIF
  122. ;  move OffsetTable to QuickdrawText 
  123. Intl0Rec                RECORD 0
  124. decimalPt                 ds.b    1                ; offset: $0 (0)        ; decimal point character
  125. thousSep                 ds.b    1                ; offset: $1 (1)        ; thousands separator character
  126. listSep                     ds.b    1                ; offset: $2 (2)        ; list separator character
  127. currSym1                 ds.b    1                ; offset: $3 (3)        ; currency symbol
  128. currSym2                 ds.b    1                ; offset: $4 (4)
  129. currSym3                 ds.b    1                ; offset: $5 (5)
  130. currFmt                     ds.b    1                ; offset: $6 (6)        ; currency format flags
  131. dateOrder                 ds.b    1                ; offset: $7 (7)        ; order of short date elements: mdy, dmy, etc.
  132. shrtDateFmt                 ds.b    1                ; offset: $8 (8)        ; format flags for each short date element
  133. dateSep                     ds.b    1                ; offset: $9 (9)        ; date separator character
  134. timeCycle                 ds.b    1                ; offset: $A (10)        ; specifies time cycle: 0..23, 1..12, or 0..11
  135. timeFmt                     ds.b    1                ; offset: $B (11)        ; format flags for each time element
  136. mornStr                     ds.b    4                ; offset: $C (12)        ; trailing string for AM if 12-hour cycle
  137. eveStr                     ds.b    4                ; offset: $10 (16)        ; trailing string for PM if 12-hour cycle
  138. timeSep                     ds.b    1                ; offset: $14 (20)        ; time separator character
  139. time1Suff                 ds.b    1                ; offset: $15 (21)        ; trailing string for AM if 24-hour cycle
  140. time2Suff                 ds.b    1                ; offset: $16 (22)
  141. time3Suff                 ds.b    1                ; offset: $17 (23)
  142. time4Suff                 ds.b    1                ; offset: $18 (24)
  143. time5Suff                 ds.b    1                ; offset: $19 (25)        ; trailing string for PM if 24-hour cycle
  144. time6Suff                 ds.b    1                ; offset: $1A (26)
  145. time7Suff                 ds.b    1                ; offset: $1B (27)
  146. time8Suff                 ds.b    1                ; offset: $1C (28)
  147. metricSys                 ds.b    1                ; offset: $1D (29)        ; 255 if metric, 0 if inches etc.
  148. intl0Vers                 ds.w    1                ; offset: $1E (30)        ; region code (hi byte) and version (lo byte)
  149. sizeof                     EQU *                    ; size:   $20 (32)
  150.                         ENDR
  151. ; typedef struct Intl0Rec *                Intl0Ptr
  152.  
  153. ; typedef Intl0Ptr *                    Intl0Hndl
  154.  
  155. Intl1Rec                RECORD 0
  156. days                     ds.b    7 * Str15.sizeof ; offset: $0 (0)        ; day names
  157. months                     ds.b    12 * Str15.sizeof ; offset: $70 (112)    ; month names
  158. suppressDay                 ds.b    1                ; offset: $130 (304)    ; 255 for no day, or flags to suppress any element
  159. lngDateFmt                 ds.b    1                ; offset: $131 (305)    ; order of long date elements
  160. dayLeading0                 ds.b    1                ; offset: $132 (306)    ; 255 for leading 0 in day number
  161. abbrLen                     ds.b    1                ; offset: $133 (307)    ; length for abbreviating names
  162. st0                         ds.b    4                ; offset: $134 (308)    ; separator strings for long date format
  163. st1                         ds.b    4                ; offset: $138 (312)
  164. st2                         ds.b    4                ; offset: $13C (316)
  165. st3                         ds.b    4                ; offset: $140 (320)
  166. st4                         ds.b    4                ; offset: $144 (324)
  167. intl1Vers                 ds.w    1                ; offset: $148 (328)    ; region code (hi byte) and version (lo byte)
  168. localRtn                 ds.w    1                ; offset: $14A (330) <-- really an array of length one ; now a flag for opt extension
  169. sizeof                     EQU *                    ; size:   $14C (332)
  170.                         ENDR
  171. ; typedef struct Intl1Rec *                Intl1Ptr
  172.  
  173. ; typedef Intl1Ptr *                    Intl1Hndl
  174.  
  175. ; fields for optional itl1 extension
  176. Itl1ExtRec                RECORD 0
  177. base                     ds        Intl1Rec        ; offset: $0 (0)        ; un-extended Intl1Rec
  178. version                     ds.w    1                ; offset: $14C (332)
  179. format                     ds.w    1                ; offset: $14E (334)
  180. calendarCode             ds.w    1                ; offset: $150 (336)    ; calendar code for this itl1 resource
  181. extraDaysTableOffset     ds.l    1                ; offset: $152 (338)    ; offset in itl1 to extra days table
  182. extraDaysTableLength     ds.l    1                ; offset: $156 (342)    ; length of extra days table
  183. extraMonthsTableOffset     ds.l    1                ; offset: $15A (346)    ; offset in itl1 to extra months table
  184. extraMonthsTableLength     ds.l    1                ; offset: $15E (350)    ; length of extra months table
  185. abbrevDaysTableOffset     ds.l    1                ; offset: $162 (354)    ; offset in itl1 to abbrev days table
  186. abbrevDaysTableLength     ds.l    1                ; offset: $166 (358)    ; length of abbrev days table
  187. abbrevMonthsTableOffset     ds.l    1                ; offset: $16A (362)    ; offset in itl1 to abbrev months table
  188. abbrevMonthsTableLength     ds.l    1                ; offset: $16E (366)    ; length of abbrev months table
  189. extraSepsTableOffset     ds.l    1                ; offset: $172 (370)    ; offset in itl1 to extra seps table
  190. extraSepsTableLength     ds.l    1                ; offset: $176 (374)    ; length of extra seps table
  191. tables                     ds.w    1                ; offset: $17A (378) <-- really an array of length one ; now a flag for opt extension
  192. sizeof                     EQU *                    ; size:   $17C (380)
  193.                         ENDR
  194.     IF FOR_SYSTEM7_AND_SYSTEM8_DEPRECATED THEN
  195. ; Assembly-only records for use with itl2 resources
  196. ;  String data structure for itl2 stack frames 
  197. IUStrData                RECORD 0
  198. curChar                     ds.w    1                ; offset: $0 (0)        ;  current character. 
  199. mapChar                     ds.w    1                ; offset: $2 (2)        ;  projected character. 
  200. decChar                     ds.w    1                ; offset: $4 (4)        ;  decision char for weak equality. 
  201. bufChar                     ds.b    1                ; offset: $6 (6)        ;  buffer for expansion. 
  202. justAfter                 ds.b    1                ; offset: $7 (7)        ;  boolean for AE vs ligature-AE, etc. 
  203. ignChar                     ds.b    1                ; offset: $8 (8)        ;  flag: ignore char. 
  204. noFetch                     ds.b    1                ; offset: $9 (9)        ;  flag: no fetch of next. 
  205. strCnt                     ds.w    1                ; offset: $A (10)        ;  length word. 
  206. strPtr                     ds.l    1                ; offset: $C (12)        ;  current ptr to string. 
  207. sizeof                     EQU *                    ; size:   $10 (16)
  208.                         ENDR
  209. ;  Stack from for itl2 sorting hooks (pre System 7) 
  210. IUSortFrame        record    {oldA6},decrement
  211. result            ds.w    1
  212. aStrText        ds.l    1
  213. bStrText        ds.l    1
  214. aStrLen            ds.w    1
  215. bStrLen            ds.w    1
  216. return            ds.l    1
  217. oldA6            ds.l    1
  218. aInfo            ds        IUStrData
  219. bInfo            ds        IUStrData
  220. wantMag            ds.b    1                ; 0 to use primary differences only; else 1
  221. weakEq            ds.b    1                ; Signals at most weak equality.
  222. msLock            ds.b    1                ; (obsolete, not used)
  223. weakMag            ds.b    1                ; -1 to force magnitude result (-1,0,1); else 0
  224. supStorage        ds.b    18                ; extra storage.
  225. weakAPtr        ds.l    1                ; sup. pointer
  226. weakBPtr        ds.l    1                ; sup. pointer
  227. lkSize            equ        *                ; frame size.
  228. paramBytes        equ     aStrText-return
  229.                 endr
  230. ;  Stack from for itl2 sorting hooks (System 7 and later; adds itl2Handle) 
  231. IUNSortFrame    record    {oldA6},decrement
  232. result            ds.w    1
  233. aStrText        ds.l    1
  234. bStrText        ds.l    1
  235. aStrLen            ds.w    1
  236. bStrLen            ds.w    1
  237. return            ds.l    1
  238. oldA6            ds.l    1
  239. aInfo            ds        IUStrData
  240. bInfo            ds        IUStrData
  241. wantMag            ds.b    1                ; 0 to use primary differences only; else 1
  242. weakEq            ds.b    1                ; Signals at most weak equality.
  243. msLock            ds.b    1                ; (obsolete, not used)
  244. weakMag            ds.b    1                ; -1 to force magnitude result (-1,0,1); else 0
  245. supStorage        ds.b    18                ; extra storage.
  246. weakAPtr        ds.l    1                ; sup. pointer
  247. weakBPtr        ds.l    1                ; sup. pointer
  248. itl2Handle        ds.l    1                ; itl2 handle, if supplied
  249. lkSize            equ        *                ; frame size.
  250. paramBytes        equ        aStrText-return
  251.                 endr
  252.     ENDIF
  253. UntokenTable            RECORD 0
  254. len                         ds.w    1                ; offset: $0 (0)
  255. lastToken                 ds.w    1                ; offset: $2 (2)
  256. index                     ds.w    256                ; offset: $4 (4)        ; index table; last = lastToken
  257. sizeof                     EQU *                    ; size:   $204 (516)
  258.                         ENDR
  259. ; typedef struct UntokenTable *            UntokenTablePtr
  260.  
  261. ; typedef UntokenTablePtr *                UntokenTableHandle
  262.  
  263. WideChar                RECORD 0
  264. char16                     ds.w    1                ; offset: $0 (0)
  265. sizeof                     EQU *                    ; size:   $2 (2)
  266.                         ENDR
  267. WideCharArr                RECORD 0
  268. size                     ds.w    1                ; offset: $0 (0)
  269. data                     ds.b    10 * WideChar.sizeof ; offset: $2 (2)
  270. sizeof                     EQU *                    ; size:   $16 (22)
  271.                         ENDR
  272. NumberParts                RECORD 0
  273. version                     ds.w    1                ; offset: $0 (0)
  274. data                     ds.b    31 * WideChar.sizeof ; offset: $2 (2)    ; index by [tokLeftQuote..tokMaxSymbols]
  275. pePlus                     ds        WideCharArr        ; offset: $40 (64)
  276. peMinus                     ds        WideCharArr        ; offset: $56 (86)
  277. peMinusPlus                 ds        WideCharArr        ; offset: $6C (108)
  278. altNumTable                 ds        WideCharArr        ; offset: $82 (130)
  279. reserved                 ds.b    20                ; offset: $98 (152)
  280. sizeof                     EQU *                    ; size:   $AC (172)
  281.                         ENDR
  282. ; typedef struct NumberParts *            NumberPartsPtr
  283.  
  284. Itl4Rec                    RECORD 0
  285. flags                     ds.w    1                ; offset: $0 (0)        ; reserved
  286. resourceType             ds.l    1                ; offset: $2 (2)        ; contains 'itl4'
  287. resourceNum                 ds.w    1                ; offset: $6 (6)        ; resource ID
  288. version                     ds.w    1                ; offset: $8 (8)        ; version number
  289. resHeader1                 ds.l    1                ; offset: $A (10)        ; reserved
  290. resHeader2                 ds.l    1                ; offset: $E (14)        ; reserved
  291. numTables                 ds.w    1                ; offset: $12 (18)        ; number of tables, one-based
  292. mapOffset                 ds.l    1                ; offset: $14 (20)        ; offset to table that maps byte to token
  293. strOffset                 ds.l    1                ; offset: $18 (24)        ; offset to routine that copies canonical string
  294. fetchOffset                 ds.l    1                ; offset: $1C (28)        ; offset to routine that gets next byte of character
  295. unTokenOffset             ds.l    1                ; offset: $20 (32)        ; offset to table that maps token to canonical string
  296. defPartsOffset             ds.l    1                ; offset: $24 (36)        ; offset to default number parts table
  297. resOffset6                 ds.l    1                ; offset: $28 (40)        ; reserved
  298. resOffset7                 ds.l    1                ; offset: $2C (44)        ; reserved
  299. resOffset8                 ds.l    1                ; offset: $30 (48)        ; reserved
  300. sizeof                     EQU *                    ; size:   $34 (52)
  301.                         ENDR
  302. ; typedef struct Itl4Rec *                Itl4Ptr
  303.  
  304. ; typedef Itl4Ptr *                        Itl4Handle
  305.  
  306. ;  New NItl4Rec for System 7.0: 
  307. NItl4Rec                RECORD 0
  308. flags                     ds.w    1                ; offset: $0 (0)        ; reserved
  309. resourceType             ds.l    1                ; offset: $2 (2)        ; contains 'itl4'
  310. resourceNum                 ds.w    1                ; offset: $6 (6)        ; resource ID
  311. version                     ds.w    1                ; offset: $8 (8)        ; version number
  312. format                     ds.w    1                ; offset: $A (10)        ; format code
  313. resHeader                 ds.w    1                ; offset: $C (12)        ; reserved
  314. resHeader2                 ds.l    1                ; offset: $E (14)        ; reserved
  315. numTables                 ds.w    1                ; offset: $12 (18)        ; number of tables, one-based
  316. mapOffset                 ds.l    1                ; offset: $14 (20)        ; offset to table that maps byte to token
  317. strOffset                 ds.l    1                ; offset: $18 (24)        ; offset to routine that copies canonical string
  318. fetchOffset                 ds.l    1                ; offset: $1C (28)        ; offset to routine that gets next byte of character
  319. unTokenOffset             ds.l    1                ; offset: $20 (32)        ; offset to table that maps token to canonical string
  320. defPartsOffset             ds.l    1                ; offset: $24 (36)        ; offset to default number parts table
  321. whtSpListOffset             ds.l    1                ; offset: $28 (40)        ; offset to white space code list
  322. resOffset7                 ds.l    1                ; offset: $2C (44)        ; reserved
  323. resOffset8                 ds.l    1                ; offset: $30 (48)        ; reserved
  324. resLength1                 ds.w    1                ; offset: $34 (52)        ; reserved
  325. resLength2                 ds.w    1                ; offset: $36 (54)        ; reserved
  326. resLength3                 ds.w    1                ; offset: $38 (56)        ; reserved
  327. unTokenLength             ds.w    1                ; offset: $3A (58)        ; length of untoken table
  328. defPartsLength             ds.w    1                ; offset: $3C (60)        ; length of default number parts table
  329. whtSpListLength             ds.w    1                ; offset: $3E (62)        ; length of white space code list
  330. resLength7                 ds.w    1                ; offset: $40 (64)        ; reserved
  331. resLength8                 ds.w    1                ; offset: $42 (66)        ; reserved
  332. sizeof                     EQU *                    ; size:   $44 (68)
  333.                         ENDR
  334. ; typedef struct NItl4Rec *                NItl4Ptr
  335.  
  336. ; typedef NItl4Ptr *                    NItl4Handle
  337.  
  338. TableDirectoryRecord    RECORD 0
  339. tableSignature             ds.l    1                ; offset: $0 (0)        ; 4 byte long table name 
  340. reserved                 ds.l    1                ; offset: $4 (4)        ; Reserved for internal use 
  341. tableStartOffset         ds.l    1                ; offset: $8 (8)        ; Table start offset in byte
  342. tableSize                 ds.l    1                ; offset: $C (12)        ; Table size in byte
  343. sizeof                     EQU *                    ; size:   $10 (16)
  344.                         ENDR
  345. Itl5Record                RECORD 0
  346. versionNumber             ds.l    1                ; offset: $0 (0)        ; itl5 resource version number 
  347. numberOfTables             ds.w    1                ; offset: $4 (4)        ; Number of tables it contains 
  348. reserved                 ds.w    3                ; offset: $6 (6)        ; Reserved for internal use 
  349. tableDirectory             ds        TableDirectoryRecord ; offset: $C (12) <-- really an array of length one ; Table directory records 
  350. sizeof                     EQU *                    ; size:   $1C (28)
  351.                         ENDR
  352. RuleBasedTrslRecord        RECORD 0
  353. sourceType                 ds.w    1                ; offset: $0 (0)        ; Transliterate target type for the LHS of the rule 
  354. targetType                 ds.w    1                ; offset: $2 (2)        ; Transliterate target type for the RHS of the rule 
  355. formatNumber             ds.w    1                ; offset: $4 (4)        ; Transliterate resource format number 
  356. propertyFlag             ds.w    1                ; offset: $6 (6)        ; Transliterate property flags 
  357. numberOfRules             ds.w    1                ; offset: $8 (8)        ; Number of rules following this field 
  358. sizeof                     EQU *                    ; size:   $A (10)
  359.                         ENDR
  360. ItlcRecord                RECORD 0
  361. itlcSystem                 ds.w    1                ; offset: $0 (0)        ; default system script
  362. itlcReserved             ds.w    1                ; offset: $2 (2)        ; reserved
  363. itlcFontForce             ds.b    1                ; offset: $4 (4)        ; default font force flag
  364. itlcIntlForce             ds.b    1                ; offset: $5 (5)        ; default intl force flag
  365. itlcOldKybd                 ds.b    1                ; offset: $6 (6)        ; MacPlus intl keybd flag
  366. itlcFlags                 ds.b    1                ; offset: $7 (7)        ; general flags
  367. itlcIconOffset             ds.w    1                ; offset: $8 (8)        ; keyboard icon offset; not used in 7.0
  368. itlcIconSide             ds.b    1                ; offset: $A (10)        ; keyboard icon side; not used in 7.0
  369. itlcIconRsvd             ds.b    1                ; offset: $B (11)        ; rsvd for other icon info
  370. itlcRegionCode             ds.w    1                ; offset: $C (12)        ; preferred verXxx code
  371. itlcSysFlags             ds.w    1                ; offset: $E (14)        ; flags for setting system globals
  372. itlcReserved4             ds.b    32                ; offset: $10 (16)        ; for future use
  373. sizeof                     EQU *                    ; size:   $30 (48)
  374.                         ENDR
  375. ItlbRecord                RECORD 0
  376. itlbNumber                 ds.w    1                ; offset: $0 (0)        ; itl0 id number
  377. itlbDate                 ds.w    1                ; offset: $2 (2)        ; itl1 id number
  378. itlbSort                 ds.w    1                ; offset: $4 (4)        ; itl2 id number
  379. itlbFlags                 ds.w    1                ; offset: $6 (6)        ; Script flags
  380. itlbToken                 ds.w    1                ; offset: $8 (8)        ; itl4 id number
  381. itlbEncoding             ds.w    1                ; offset: $A (10)        ; itl5 ID # (optional; char encoding)
  382. itlbLang                 ds.w    1                ; offset: $C (12)        ; current language for script 
  383. itlbNumRep                 ds.b    1                ; offset: $E (14)        ; number representation code
  384. itlbDateRep                 ds.b    1                ; offset: $F (15)        ; date representation code 
  385. itlbKeys                 ds.w    1                ; offset: $10 (16)        ; KCHR id number
  386. itlbIcon                 ds.w    1                ; offset: $12 (18)        ; ID # of SICN or kcs#/kcs4/kcs8 suite.
  387. sizeof                     EQU *                    ; size:   $14 (20)
  388.                         ENDR
  389. ;  New ItlbExtRecord structure for System 7.0 
  390. ItlbExtRecord            RECORD 0
  391. base                     ds        ItlbRecord        ; offset: $0 (0)        ; un-extended ItlbRecord
  392. itlbLocalSize             ds.l    1                ; offset: $14 (20)        ; size of script's local record
  393. itlbMonoFond             ds.w    1                ; offset: $18 (24)        ; default monospace FOND ID
  394. itlbMonoSize             ds.w    1                ; offset: $1A (26)        ; default monospace font size
  395. itlbPrefFond             ds.w    1                ; offset: $1C (28)        ; preferred FOND ID
  396. itlbPrefSize             ds.w    1                ; offset: $1E (30)        ; preferred font size
  397. itlbSmallFond             ds.w    1                ; offset: $20 (32)        ; default small FOND ID
  398. itlbSmallSize             ds.w    1                ; offset: $22 (34)        ; default small font size
  399. itlbSysFond                 ds.w    1                ; offset: $24 (36)        ; default system FOND ID
  400. itlbSysSize                 ds.w    1                ; offset: $26 (38)        ; default system font size
  401. itlbAppFond                 ds.w    1                ; offset: $28 (40)        ; default application FOND ID
  402. itlbAppSize                 ds.w    1                ; offset: $2A (42)        ; default application font size
  403. itlbHelpFond             ds.w    1                ; offset: $2C (44)        ; default Help Mgr FOND ID
  404. itlbHelpSize             ds.w    1                ; offset: $2E (46)        ; default Help Mgr font size
  405. itlbValidStyles             ds.b    1                ; offset: $30 (48)        ; set of valid styles for script
  406. itlbAliasStyle             ds.b    1                ; offset: $31 (49)        ; style (set) to mark aliases
  407. sizeof                     EQU *                    ; size:   $32 (50)
  408.                         ENDR
  409.     ENDIF ; __INTLRESOURCES__ 
  410.  
  411.